home *** CD-ROM | disk | FTP | other *** search
/ Die Speccy' 97 / Die Speccy' 97.iso / amiga_system / the_aminet / comm / misc / amm_0_32.lha / amm-0.32 / cleanup.amm < prev    next >
Text File  |  1995-10-04  |  446b  |  14 lines
  1. ; $VER: $Id: cleanup.amm 1.5 1995/07/31 18:02:34 tf Exp $
  2. ; (c)Copyright 1995 by Tobias Ferber,  All Rights Reserved
  3.  
  4. If EXISTS "%p%n"
  5.   Echo "%d%n (%c)"
  6.   SetDate FILE "%p%n" DATE "%D" TIME "%T"
  7.   FileNote QUIET FILE "%p%n" COMMENT "%c"
  8.   If NOT "%p%n" EQ "downloads:aminet/%d%n"
  9.     ;Copy QUIET CLONE FROM "%p%n" TO "downloads:aminet/%d%n"
  10.     ;Delete QUIET FILE "%p%n"
  11.     Move QUIET CLONE FROM "%p%n" TO "downloads:aminet/%d%n"
  12.   EndIf
  13. EndIf
  14.